home *** CD-ROM | disk | FTP | other *** search
- object EditAssociation: TEditAssociation
- Left = 235
- Top = 445
- BorderStyle = bsDialog
- Caption = 'Edit File Association'
- ClientHeight = 145
- ClientWidth = 469
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Extension: TLabel
- Left = 12
- Top = 11
- Width = 158
- Height = 20
- Caption = 'File Extension = %s'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clMaroon
- Font.Height = -16
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label1: TLabel
- Left = 13
- Top = 54
- Width = 97
- Height = 13
- Caption = 'Associated Program:'
- end
- object Bevel1: TBevel
- Left = 12
- Top = 85
- Width = 441
- Height = 13
- Shape = bsTopLine
- end
- object OKButton: TButton
- Left = 291
- Top = 106
- Width = 75
- Height = 25
- Caption = '&OK'
- Default = True
- TabOrder = 0
- OnClick = OKButtonClick
- end
- object CancelButton: TButton
- Left = 379
- Top = 106
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object AssocPath: TEdit
- Left = 117
- Top = 50
- Width = 247
- Height = 21
- Color = 12713983
- TabOrder = 2
- end
- object BrowseButton: TButton
- Left = 369
- Top = 48
- Width = 75
- Height = 25
- Caption = '&Browse...'
- TabOrder = 3
- OnClick = BrowseButtonClick
- end
- object OpenDialog1: TOpenDialog
- DefaultExt = 'EXE'
- Filter =
- 'EXE files (*.EXE)|*.EXE|COM files (*.COM)|*.COM|All files (*.*)|' +
- '*.*'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Left = 17
- Top = 102
- end
- end
-